VecValueStart=[926 976];
ValueFilter=1;
n2=33;
ValueTime=4;
ValueFolderTemp='/sps/isc/rneveu/EtudeIRM/Nature/ResultsJournal/';

for n4=1:size(VecValueStart,2)
    nStart=VecValueStart(1,n4);
    if ValueTime>=1
        if ValueFilter==0
            ValueFile=['FileAnalysis' num2str(ValueTime) 'Journal' num2str(n2) 'Start' num2str(nStart) '.mat'];
        else
            ValueFile=['FileAnalysis' num2str(ValueTime) 'Filtered' num2str(ValueFilter) 'Journal' num2str(n2) 'Start' num2str(nStart) '.mat'];
        end
    else
        if ValueFilter==0
            ValueFile=['FileAnalysisJournal' num2str(n2) 'Start' num2str(nStart) '.mat'];
        else
            ValueFile=['FileAnalysisFiltered' num2str(ValueFilter) 'Journal' num2str(n2) 'Start' num2str(nStart) '.mat'];
        end
    end
    load([ValueFolderTemp ValueFile])
    VecResultsArticle1Temp=VecResultsArticle1;
    VecResultsArticle2Temp=VecResultsArticle2;
    nStart=nStart+1;
    if ValueTime>=1
        if ValueFilter==0
            ValueFile=['FileAnalysis' num2str(ValueTime) 'Journal' num2str(n2) 'Start' num2str(nStart) '.mat'];
        else
            ValueFile=['FileAnalysis' num2str(ValueTime) 'Filtered' num2str(ValueFilter) 'Journal' num2str(n2) 'Start' num2str(nStart) '.mat'];
        end
    else
        if ValueFilter==0
            ValueFile=['FileAnalysisJournal' num2str(n2) 'Start' num2str(nStart) '.mat'];
        else
            ValueFile=['FileAnalysisFiltered' num2str(ValueFilter) 'Journal' num2str(n2) 'Start' num2str(nStart) '.mat'];
        end
    end
    load([ValueFolderTemp ValueFile])
    VecResultsArticle1Temp=VecResultsArticle1Temp+VecResultsArticle1;
    VecResultsArticle2Temp=VecResultsArticle2Temp+VecResultsArticle2;
    VecResultsArticle1=VecResultsArticle1Temp;
    VecResultsArticle2=VecResultsArticle2Temp;
    nStart=nStart-1;
    if ValueTime>=1
        if ValueFilter==0
            ValueFile=['FileAnalysis' num2str(ValueTime) 'Journal' num2str(n2) 'Start' num2str(nStart) '.mat'];
        else
            ValueFile=['FileAnalysis' num2str(ValueTime) 'Filtered' num2str(ValueFilter) 'Journal' num2str(n2) 'Start' num2str(nStart) '.mat'];
        end
    else
        if ValueFilter==0
            ValueFile=['FileAnalysisJournal' num2str(n2) 'Start' num2str(nStart) '.mat'];
        else
            ValueFile=['FileAnalysisFiltered' num2str(ValueFilter) 'Journal' num2str(n2) 'Start' num2str(nStart) '.mat'];
        end
    end
    save([ValueFolderTemp ValueFile],'VecResultsArticle1','VecResultsArticle2');
end

